home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1996 July / macformat-039.iso / Shareware City / Developers / LogoMation 1.1.1 / Examples / Venetian blind / Venetian blind
Encoding:
Text File  |  1995-09-17  |  237 b   |  10 lines  |  [UVtx/UVtl]
  1. // A 3D picture of a venetian blind.  Stare at the dots till you
  2. // see it...
  3.  
  4. Library ":lib:rec3d"
  5. Clear 0,0,0
  6. d = 80
  7. Repeat Y,-height()/2,height()/2,30
  8.     d = d - 3
  9.     rec3d(-width()/2,Y,d,30,0.05,22000,65000,0.1,d,int(width()/d)+2)
  10.